library(ClusterR)
## Loading required package: gtools
library(knitr)
library(rgl)
library(rglwidget)
## The functions in the rglwidget package have been moved to rgl.
knit_hooks$set(webgl = hook_webgl)
library(scatterplot3d)
library(ggplot2)
clustNums =10
cols <- paste0("clust",c(1:clustNums))